home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2010 April / PCWorld0410.iso / hity wydania / Ubuntu 9.10 PL / karmelkowy-koliberek-desktop-9.10-i386-PL.iso / casper / filesystem.squashfs / usr / bin / pod2man < prev    next >
Text File  |  2009-10-01  |  21KB  |  536 lines

  1. #!/usr/bin/perl
  2.     eval 'exec /usr/bin/perl -S $0 ${1+"$@"}'
  3.         if $running_under_some_shell;
  4.  
  5. # pod2man -- Convert POD data to formatted *roff input.
  6. #
  7. # Copyright 1999, 2000, 2001, 2004, 2006, 2008
  8. #     Russ Allbery <rra@stanford.edu>
  9. #
  10. # This program is free software; you may redistribute it and/or modify it
  11. # under the same terms as Perl itself.
  12.  
  13. require 5.004;
  14.  
  15. use Getopt::Long qw(GetOptions);
  16. use Pod::Man ();
  17. use Pod::Usage qw(pod2usage);
  18.  
  19. use strict;
  20.  
  21. # Silence -w warnings.
  22. use vars qw($running_under_some_shell);
  23.  
  24. # Insert -- into @ARGV before any single dash argument to hide it from
  25. # Getopt::Long; we want to interpret it as meaning stdin.
  26. my $stdin;
  27. @ARGV = map { $_ eq '-' && !$stdin++ ? ('--', $_) : $_ } @ARGV;
  28.  
  29. # Parse our options, trying to retain backwards compatibility with pod2man but
  30. # allowing short forms as well.  --lax is currently ignored.
  31. my %options;
  32. Getopt::Long::config ('bundling_override');
  33. GetOptions (\%options, 'section|s=s', 'release|r:s', 'center|c=s',
  34.             'date|d=s', 'fixed=s', 'fixedbold=s', 'fixeditalic=s',
  35.             'fixedbolditalic=s', 'name|n=s', 'official|o', 'quotes|q=s',
  36.             'lax|l', 'help|h', 'verbose|v', 'utf8|u') or exit 1;
  37. pod2usage (0) if $options{help};
  38.  
  39. # Official sets --center, but don't override things explicitly set.
  40. if ($options{official} && !defined $options{center}) {
  41.     $options{center} = 'Perl Programmers Reference Guide';
  42. }
  43.  
  44. # Verbose is only our flag, not a Pod::Man flag.
  45. my $verbose = $options{verbose};
  46. delete $options{verbose};
  47.  
  48. # This isn't a valid Pod::Man option and is only accepted for backwards
  49. # compatibility.
  50. delete $options{lax};
  51.  
  52. # Initialize and run the formatter, pulling a pair of input and output off at
  53. # a time.
  54. my $parser = Pod::Man->new (%options);
  55. my @files;
  56. do {
  57.     @files = splice (@ARGV, 0, 2);
  58.     print "  $files[1]\n" if $verbose;
  59.     $parser->parse_from_file (@files);
  60. } while (@ARGV);
  61.  
  62. __END__
  63.  
  64. =head1 NAME
  65.  
  66. pod2man - Convert POD data to formatted *roff input
  67.  
  68. =head1 SYNOPSIS
  69.  
  70. pod2man [B<--section>=I<manext>] [B<--release>[=I<version>]]
  71. [B<--center>=I<string>] [B<--date>=I<string>] [B<--fixed>=I<font>]
  72. [B<--fixedbold>=I<font>] [B<--fixeditalic>=I<font>]
  73. [B<--fixedbolditalic>=I<font>] [B<--name>=I<name>] [B<--official>]
  74. [B<--lax>] [B<--quotes>=I<quotes>] [B<--utf8>] [B<--verbose>]
  75. [I<input> [I<output>] ...]
  76.  
  77. pod2man B<--help>
  78.  
  79. =head1 DESCRIPTION
  80.  
  81. B<pod2man> is a front-end for Pod::Man, using it to generate *roff input
  82. from POD source.  The resulting *roff code is suitable for display on a
  83. terminal using nroff(1), normally via man(1), or printing using troff(1).
  84.  
  85. I<input> is the file to read for POD source (the POD can be embedded in
  86. code).  If I<input> isn't given, it defaults to STDIN.  I<output>, if given,
  87. is the file to which to write the formatted output.  If I<output> isn't
  88. given, the formatted output is written to STDOUT.  Several POD files can be
  89. processed in the same B<pod2man> invocation (saving module load and compile
  90. times) by providing multiple pairs of I<input> and I<output> files on the
  91. command line.
  92.  
  93. B<--section>, B<--release>, B<--center>, B<--date>, and B<--official> can be
  94. used to set the headers and footers to use; if not given, Pod::Man will
  95. assume various defaults.  See below or L<Pod::Man> for details.
  96.  
  97. B<pod2man> assumes that your *roff formatters have a fixed-width font named
  98. CW.  If yours is called something else (like CR), use B<--fixed> to specify
  99. it.  This generally only matters for troff output for printing.  Similarly,
  100. you can set the fonts used for bold, italic, and bold italic fixed-width
  101. output.
  102.  
  103. Besides the obvious pod conversions, Pod::Man, and therefore pod2man also
  104. takes care of formatting func(), func(n), and simple variable references
  105. like $foo or @bar so you don't have to use code escapes for them; complex
  106. expressions like C<$fred{'stuff'}> will still need to be escaped, though.
  107. It also translates dashes that aren't used as hyphens into en dashes, makes
  108. long dashes--like this--into proper em dashes, fixes "paired quotes," and
  109. takes care of several other troff-specific tweaks.  See L<Pod::Man> for
  110. complete information.
  111.  
  112. =head1 OPTIONS
  113.  
  114. =over 4
  115.  
  116. =item B<-c> I<string>, B<--center>=I<string>
  117.  
  118. Sets the centered page header to I<string>.  The default is "User
  119. Contributed Perl Documentation", but also see B<--official> below.
  120.  
  121. =item B<-d> I<string>, B<--date>=I<string>
  122.  
  123. Set the left-hand footer string to this value.  By default, the modification
  124. date of the input file will be used, or the current date if input comes from
  125. STDIN.
  126.  
  127. =item B<--fixed>=I<font>
  128.  
  129. The fixed-width font to use for vertabim text and code.  Defaults to CW.
  130. Some systems may want CR instead.  Only matters for troff(1) output.
  131.  
  132. =item B<--fixedbold>=I<font>
  133.  
  134. Bold version of the fixed-width font.  Defaults to CB.  Only matters for
  135. troff(1) output.
  136.  
  137. =item B<--fixeditalic>=I<font>
  138.  
  139. Italic version of the fixed-width font (actually, something of a misnomer,
  140. since most fixed-width fonts only have an oblique version, not an italic
  141. version).  Defaults to CI.  Only matters for troff(1) output.
  142.  
  143. =item B<--fixedbolditalic>=I<font>
  144.  
  145. Bold italic (probably actually oblique) version of the fixed-width font.
  146. Pod::Man doesn't assume you have this, and defaults to CB.  Some systems
  147. (such as Solaris) have this font available as CX.  Only matters for troff(1)
  148. output.
  149.  
  150. =item B<-h>, B<--help>
  151.  
  152. Print out usage information.
  153.  
  154. =item B<-l>, B<--lax>
  155.  
  156. No longer used.  B<pod2man> used to check its input for validity as a manual
  157. page, but this should now be done by L<podchecker(1)> instead.  Accepted for
  158. backwards compatibility; this option no longer does anything.
  159.  
  160. =item B<-n> I<name>, B<--name>=I<name>
  161.  
  162. Set the name of the manual page to I<name>.  Without this option, the manual
  163. name is set to the uppercased base name of the file being converted unless
  164. the manual section is 3, in which case the path is parsed to see if it is a
  165. Perl module path.  If it is, a path like C<.../lib/Pod/Man.pm> is converted
  166. into a name like C<Pod::Man>.  This option, if given, overrides any
  167. automatic determination of the name.
  168.  
  169. Note that this option is probably not useful when converting multiple POD
  170. files at once.  The convention for Unix man pages for commands is for the
  171. man page title to be in all-uppercase even if the command isn't.
  172.  
  173. =item B<-o>, B<--official>
  174.  
  175. Set the default header to indicate that this page is part of the standard
  176. Perl release, if B<--center> is not also given.
  177.  
  178. =item B<-q> I<quotes>, B<--quotes>=I<quotes>
  179.  
  180. Sets the quote marks used to surround CE<lt>> text to I<quotes>.  If
  181. I<quotes> is a single character, it is used as both the left and right
  182. quote; if I<quotes> is two characters, the first character is used as the
  183. left quote and the second as the right quoted; and if I<quotes> is four
  184. characters, the first two are used as the left quote and the second two as
  185. the right quote.
  186.  
  187. I<quotes> may also be set to the special value C<none>, in which case no
  188. quote marks are added around CE<lt>> text (but the font is still changed for
  189. troff output).
  190.  
  191. =item B<-r>, B<--release>
  192.  
  193. Set the centered footer.  By default, this is the version of Perl you run
  194. B<pod2man> under.  Note that some system an macro sets assume that the
  195. centered footer will be a modification date and will prepend something like
  196. "Last modified: "; if this is the case, you may want to set B<--release> to
  197. the last modified date and B<--date> to the version number.
  198.  
  199. =item B<-s>, B<--section>
  200.  
  201. Set the section for the C<.TH> macro.  The standard section numbering
  202. convention is to use 1 for user commands, 2 for system calls, 3 for
  203. functions, 4 for devices, 5 for file formats, 6 for games, 7 for
  204. miscellaneous information, and 8 for administrator commands.  There is a lot
  205. of variation here, however; some systems (like Solaris) use 4 for file
  206. formats, 5 for miscellaneous information, and 7 for devices.  Still others
  207. use 1m instead of 8, or some mix of both.  About the only section numbers
  208. that are reliably consistent are 1, 2, and 3.
  209.  
  210. By default, section 1 will be used unless the file ends in .pm in which case
  211. section 3 will be selected.
  212.  
  213. =item B<-u>, B<--utf8>
  214.  
  215. By default, B<pod2man> produces the most conservative possible *roff
  216. output to try to ensure that it will work with as many different *roff
  217. implementations as possible.  Many *roff implementations cannot handle
  218. non-ASCII characters, so this means all non-ASCII characters are converted
  219. either to a *roff escape sequence that tries to create a properly accented
  220. character (at least for troff output) or to C<X>.
  221.  
  222. This option says to instead output literal UTF-8 characters.  If your
  223. *roff implementation can handle it, this is the best output format to use
  224. and avoids corruption of documents containing non-ASCII characters.
  225. However, be warned that *roff source with literal UTF-8 characters is not
  226. supported by many implementations and may even result in segfaults and
  227. other bad behavior.
  228.  
  229. Be aware that, when using this option, the input encoding of your POD
  230. source must be properly declared unless it is US-ASCII or Latin-1.  POD
  231. input without an C<=encoding> command will be assumed to be in Latin-1,
  232. and if it's actually in UTF-8, the output will be double-encoded.  See
  233. L<perlpod(1)> for more information on the C<=encoding> command.
  234.  
  235. =item B<-v>, B<--verbose>
  236.  
  237. Print out the name of each output file as it is being generated.
  238.  
  239. =back
  240.  
  241. =head1 DIAGNOSTICS
  242.  
  243. If B<pod2man> fails with errors, see L<Pod::Man> and L<Pod::Simple> for
  244. information about what those errors might mean.
  245.  
  246. =head1 EXAMPLES
  247.  
  248.     pod2man program > program.1
  249.     pod2man SomeModule.pm /usr/perl/man/man3/SomeModule.3
  250.     pod2man --section=7 note.pod > note.7
  251.  
  252. If you would like to print out a lot of man page continuously, you probably
  253. want to set the C and D registers to set contiguous page numbering and
  254. even/odd paging, at least on some versions of man(7).
  255.  
  256.     troff -man -rC1 -rD1 perl.1 perldata.1 perlsyn.1 ...
  257.  
  258. To get index entries on stderr, turn on the F register, as in:
  259.  
  260.     troff -man -rF1 perl.1
  261.  
  262. The indexing merely outputs messages via C<.tm> for each major page,
  263. section, subsection, item, and any C<XE<lt>E<gt>> directives.  See
  264. L<Pod::Man> for more details.
  265.  
  266. =head1 BUGS
  267.  
  268. Lots of this documentation is duplicated from L<Pod::Man>.
  269.  
  270. =head1 NOTES
  271.  
  272. For those not sure of the proper layout of a man page, here are some notes
  273. on writing a proper man page.
  274.  
  275. The name of the program being documented is conventionally written in bold
  276. (using BE<lt>E<gt>) wherever it occurs, as are all program options.
  277. Arguments should be written in italics (IE<lt>E<gt>).  Functions are
  278. traditionally written in italics; if you write a function as function(),
  279. Pod::Man will take care of this for you.  Literal code or commands should
  280. be in CE<lt>E<gt>.  References to other man pages should be in the form
  281. C<manpage(section)>, and Pod::Man will automatically format those
  282. appropriately.  As an exception, it's traditional not to use this form when
  283. referring to module documentation; use C<LE<lt>Module::NameE<gt>> instead.
  284.  
  285. References to other programs or functions are normally in the form of man
  286. page references so that cross-referencing tools can provide the user with
  287. links and the like.  It's possible to overdo this, though, so be careful not
  288. to clutter your documentation with too much markup.
  289.  
  290. The major headers should be set out using a C<=head1> directive, and are
  291. historically written in the rather startling ALL UPPER CASE format, although
  292. this is not mandatory.  Minor headers may be included using C<=head2>, and
  293. are typically in mixed case.
  294.  
  295. The standard sections of a manual page are:
  296.  
  297. =over 4
  298.  
  299. =item NAME
  300.  
  301. Mandatory section; should be a comma-separated list of programs or functions
  302. documented by this podpage, such as:
  303.  
  304.     foo, bar - programs to do something
  305.  
  306. Manual page indexers are often extremely picky about the format of this
  307. section, so don't put anything in it except this line.  A single dash, and
  308. only a single dash, should separate the list of programs or functions from
  309. the description.  Functions should not be qualified with C<()> or the like.
  310. The description should ideally fit on a single line, even if a man program
  311. replaces the dash with a few tabs.
  312.  
  313. =item SYNOPSIS
  314.  
  315. A short usage summary for programs and functions.  This section is mandatory
  316. for section 3 pages.
  317.  
  318. =item DESCRIPTION
  319.  
  320. Extended description and discussion of the program or functions, or the body
  321. of the documentation for man pages that document something else.  If
  322. particularly long, it's a good idea to break this up into subsections
  323. C<=head2> directives like:
  324.  
  325.     =head2 Normal Usage
  326.  
  327.     =head2 Advanced Features
  328.  
  329.     =head2 Writing Configuration Files
  330.  
  331. or whatever is appropriate for your documentation.
  332.  
  333. =item OPTIONS
  334.  
  335. Detailed description of each of the command-line options taken by the
  336. program.  This should be separate from the description for the use of things
  337. like L<Pod::Usage|Pod::Usage>.  This is normally presented as a list, with
  338. each option as a separate C<=item>.  The specific option string should be
  339. enclosed in BE<lt>E<gt>.  Any values that the option takes should be
  340. enclosed in IE<lt>E<gt>.  For example, the section for the option
  341. B<--section>=I<manext> would be introduced with:
  342.  
  343.     =item B<--section>=I<manext>
  344.  
  345. Synonymous options (like both the short and long forms) are separated by a
  346. comma and a space on the same C<=item> line, or optionally listed as their
  347. own item with a reference to the canonical name.  For example, since
  348. B<--section> can also be written as B<-s>, the above would be:
  349.  
  350.     =item B<-s> I<manext>, B<--section>=I<manext>
  351.  
  352. (Writing the short option first is arguably easier to read, since the long
  353. option is long enough to draw the eye to it anyway and the short option can
  354. otherwise get lost in visual noise.)
  355.  
  356. =item RETURN VALUE
  357.  
  358. What the program or function returns, if successful.  This section can be
  359. omitted for programs whose precise exit codes aren't important, provided
  360. they return 0 on success as is standard.  It should always be present for
  361. functions.
  362.  
  363. =item ERRORS
  364.  
  365. Exceptions, error return codes, exit statuses, and errno settings.
  366. Typically used for function documentation; program documentation uses
  367. DIAGNOSTICS instead.  The general rule of thumb is that errors printed to
  368. STDOUT or STDERR and intended for the end user are documented in DIAGNOSTICS
  369. while errors passed internal to the calling program and intended for other
  370. programmers are documented in ERRORS.  When documenting a function that sets
  371. errno, a full list of the possible errno values should be given here.
  372.  
  373. =item DIAGNOSTICS
  374.  
  375. All possible messages the program can print out--and what they mean.  You
  376. may wish to follow the same documentation style as the Perl documentation;
  377. see perldiag(1) for more details (and look at the POD source as well).
  378.  
  379. If applicable, please include details on what the user should do to correct
  380. the error; documenting an error as indicating "the input buffer is too
  381. small" without telling the user how to increase the size of the input buffer
  382. (or at least telling them that it isn't possible) aren't very useful.
  383.  
  384. =item EXAMPLES
  385.  
  386. Give some example uses of the program or function.  Don't skimp; users often
  387. find this the most useful part of the documentation.  The examples are
  388. generally given as verbatim paragraphs.
  389.  
  390. Don't just present an example without explaining what it does.  Adding a
  391. short paragraph saying what the example will do can increase the value of
  392. the example immensely.
  393.  
  394. =item ENVIRONMENT
  395.  
  396. Environment variables that the program cares about, normally presented as a
  397. list using C<=over>, C<=item>, and C<=back>.  For example:
  398.  
  399.     =over 6
  400.  
  401.     =item HOME
  402.  
  403.     Used to determine the user's home directory.  F<.foorc> in this
  404.     directory is read for configuration details, if it exists.
  405.  
  406.     =back
  407.  
  408. Since environment variables are normally in all uppercase, no additional
  409. special formatting is generally needed; they're glaring enough as it is.
  410.  
  411. =item FILES
  412.  
  413. All files used by the program or function, normally presented as a list, and
  414. what it uses them for.  File names should be enclosed in FE<lt>E<gt>.  It's
  415. particularly important to document files that will be potentially modified.
  416.  
  417. =item CAVEATS
  418.  
  419. Things to take special care with, sometimes called WARNINGS.
  420.  
  421. =item BUGS
  422.  
  423. Things that are broken or just don't work quite right.
  424.  
  425. =item RESTRICTIONS
  426.  
  427. Bugs you don't plan to fix.  :-)
  428.  
  429. =item NOTES
  430.  
  431. Miscellaneous commentary.
  432.  
  433. =item AUTHOR
  434.  
  435. Who wrote it (use AUTHORS for multiple people).  Including your current
  436. e-mail address (or some e-mail address to which bug reports should be sent)
  437. so that users have a way of contacting you is a good idea.  Remember that
  438. program documentation tends to roam the wild for far longer than you expect
  439. and pick an e-mail address that's likely to last if possible.
  440.  
  441. =item HISTORY
  442.  
  443. Programs derived from other sources sometimes have this, or you might keep
  444. a modification log here.  If the log gets overly long or detailed,
  445. consider maintaining it in a separate file, though.
  446.  
  447. =item COPYRIGHT AND LICENSE
  448.  
  449. For copyright
  450.  
  451.     Copyright YEAR(s) by YOUR NAME(s)
  452.  
  453. (No, (C) is not needed.  No, "all rights reserved" is not needed.)
  454.  
  455. For licensing the easiest way is to use the same licensing as Perl itself:
  456.  
  457.     This library is free software; you may redistribute it and/or modify
  458.     it under the same terms as Perl itself.
  459.  
  460. This makes it easy for people to use your module with Perl.  Note that
  461. this licensing is neither an endorsement or a requirement, you are of
  462. course free to choose any licensing.
  463.  
  464. =item SEE ALSO
  465.  
  466. Other man pages to check out, like man(1), man(7), makewhatis(8), or
  467. catman(8).  Normally a simple list of man pages separated by commas, or a
  468. paragraph giving the name of a reference work.  Man page references, if they
  469. use the standard C<name(section)> form, don't have to be enclosed in
  470. LE<lt>E<gt> (although it's recommended), but other things in this section
  471. probably should be when appropriate.
  472.  
  473. If the package has a mailing list, include a URL or subscription
  474. instructions here.
  475.  
  476. If the package has a web site, include a URL here.
  477.  
  478. =back
  479.  
  480. In addition, some systems use CONFORMING TO to note conformance to relevant
  481. standards and MT-LEVEL to note safeness for use in threaded programs or
  482. signal handlers.  These headings are primarily useful when documenting parts
  483. of a C library.  Documentation of object-oriented libraries or modules may
  484. use CONSTRUCTORS and METHODS sections for detailed documentation of the
  485. parts of the library and save the DESCRIPTION section for an overview; other
  486. large modules may use FUNCTIONS for similar reasons.  Some people use
  487. OVERVIEW to summarize the description if it's quite long.
  488.  
  489. Section ordering varies, although NAME should I<always> be the first section
  490. (you'll break some man page systems otherwise), and NAME, SYNOPSIS,
  491. DESCRIPTION, and OPTIONS generally always occur first and in that order if
  492. present.  In general, SEE ALSO, AUTHOR, and similar material should be left
  493. for last.  Some systems also move WARNINGS and NOTES to last.  The order
  494. given above should be reasonable for most purposes.
  495.  
  496. Finally, as a general note, try not to use an excessive amount of markup.
  497. As documented here and in L<Pod::Man>, you can safely leave Perl variables,
  498. function names, man page references, and the like unadorned by markup and
  499. the POD translators will figure it out for you.  This makes it much easier
  500. to later edit the documentation.  Note that many existing translators
  501. (including this one currently) will do the wrong thing with e-mail addresses
  502. when wrapped in LE<lt>E<gt>, so don't do that.
  503.  
  504. For additional information that may be more accurate for your specific
  505. system, see either L<man(5)> or L<man(7)> depending on your system manual
  506. section numbering conventions.
  507.  
  508. =head1 SEE ALSO
  509.  
  510. L<Pod::Man>, L<Pod::Simple>, L<man(1)>, L<nroff(1)>, L<perlpod(1)>,
  511. L<podchecker(1)>, L<troff(1)>, L<man(7)>
  512.  
  513. The man page documenting the an macro set may be L<man(5)> instead of
  514. L<man(7)> on your system.
  515.  
  516. The current version of this script is always available from its web site at
  517. L<http://www.eyrie.org/~eagle/software/podlators/>.  It is also part of the
  518. Perl core distribution as of 5.6.0.
  519.  
  520. =head1 AUTHOR
  521.  
  522. Russ Allbery <rra@stanford.edu>, based I<very> heavily on the original
  523. B<pod2man> by Larry Wall and Tom Christiansen.  Large portions of this
  524. documentation, particularly the sections on the anatomy of a proper man
  525. page, are taken from the B<pod2man> documentation by Tom.
  526.  
  527. =head1 COPYRIGHT AND LICENSE
  528.  
  529. Copyright 1999, 2000, 2001, 2004, 2006, 2008 Russ Allbery
  530. <rra@stanford.edu>.
  531.  
  532. This program is free software; you may redistribute it and/or modify it
  533. under the same terms as Perl itself.
  534.  
  535. =cut
  536.